home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / Documents / Diagram / UW_Palettes / PCBLayout.dpalette2 / Image17 (.txt) < prev    next >
NeXT TypedStream Data  |  1995-06-12  |  1KB  |  41 lines
  1. typedstream
  2. NXImage
  3. Object
  4. NXEPSImageRep
  5. NXImageRep
  6. iisssss
  7. [932c]%!PS-Adobe-2.0 EPSF-2.0
  8. %%Title:ICPadHorizontal.eps
  9. %%Creator: Kevin Brain (ksbrain@zeus.UWaterloo.ca)
  10. %%CreationDate: Fri Nov 22 1991
  11. %%Pages: 0 1
  12. %%BoundingBox: 0 0 36 18 
  13. %%DocumentFonts: Times-BoldItalic
  14. %%EndComments
  15. % eps drawing of component for Diagram palette 
  16. % number of pixels per Diagram Grid
  17. /GRIDSIZE 9 def
  18. % one grid represents 0.05 inches
  19. /GRIDSCALE 0.05 def
  20. % multiply sizes in inches by ScaleFactor in pixels/inch 
  21. /SCALEFACTOR {GRIDSIZE GRIDSCALE div mul} def
  22. /OUTERRADIUS {0.03 SCALEFACTOR} def
  23. /HOLERADIUS {0.015 SCALEFACTOR} def
  24. 1 1 scale
  25. 0 setlinewidth
  26. gsave
  27. GRIDSIZE 2 mul GRIDSIZE moveto
  28. 0 OUTERRADIUS rmoveto
  29. OUTERRADIUS -1 mul 0 rlineto
  30. 0 OUTERRADIUS -1 mul rlineto
  31. currentpoint translate
  32. 0 0 OUTERRADIUS 90 270 arc
  33. OUTERRADIUS 2 mul 0 rlineto
  34. 0 OUTERRADIUS rlineto
  35. currentpoint translate
  36. 0 0 OUTERRADIUS 270 90 arc
  37. closepath
  38. grestore
  39. 1 setgray
  40. GRIDSIZE 2 mul GRIDSIZE HOLERADIUS 0 360 arc fill
  41.